perm filename SHOWT.SAI[VIS,HPM] blob sn#144760 filedate 1975-02-11 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	BEGIN "SHOWT"
C00003 ENDMK
CāŠ—;
BEGIN "SHOWT"
REQUIRE "DDSUB.SAI[GRA,HPM]" SOURCE_FILE;

WHILE TRUE DO
   BEGIN
   OUTSTR("ADD:"); SHOWA(CVO(INCHWL));
   OUTSTR("SUB:"); SHOWS(CVO(INCHWL));
   OUTSTR("SHO:"); SHOW(CVO(INCHWL));
   END;

END;